home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 71 / MOBICLIC 71.ISO / mac / DATA / COMMUN / temp0001 / 00267_Script_BOUCLE_FEN_DUMB < prev    next >
Text File  |  2004-12-05  |  1KB  |  34 lines
  1. global gL_Zap--gL_Zap[30] reprΘsente le n░ de piste son du commentaire
  2. global gJLM_W
  3. ----------------
  4. on exitFrame me
  5.   if the mouseH >= 0 and the mouseH <= gL_Zap[25][1] and the mouseV >= 0 and the mouseV <=gL_Zap[25][2] then
  6.     if  gJLM_W = 2 then
  7.       --      gL_Zap[24].modal = 1
  8.     else
  9.       --      gL_Zap[24].modal = 0
  10.     end if
  11.   else
  12.     --    gL_Zap[24].modal = 0
  13.   end if
  14.   if gL_Zap[28] then--traitement du dΘplacement
  15.     tell the stage
  16.       x0 = the stageLeft + the mouseH
  17.       y0 = the stageTop + the mouseV
  18.       gL_Zap[24].rect = rect(x0 - gL_Zap[29][1], y0- gL_Zap[29][2],x0 + gL_Zap[25][1] - gL_Zap[29][1], y0 + gL_Zap[25][2] - gL_Zap[29][2])
  19.       updatestage
  20.     end tell
  21.   else
  22.   end if
  23.   if gL_Zap[30] > 0 then 
  24.     if not(soundbusy(gL_Zap[30])) then
  25.       member("DUMB_COMMENT").text = EMPTY
  26.       member("DUMB_COMMENT_BIS").text = EMPTY
  27.       gL_Zap[30] = 0
  28.     end if
  29.   end if
  30. --   PATCH4_Os9(gL_Zap[24])
  31.   go the frame
  32. end
  33. ------------
  34.